object Form7: TForm7 Left = 455 Top = 167 BorderStyle = bsNone Caption = 'Kiralanan Dairelerin Listesi' ClientHeight = 300 ClientWidth = 300 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Image1: TImage Left = 0 Top = 0 Width = 300 Height = 300 AutoSize = True Picture.Data = {} OnMouseDown = Image1MouseDown end object Image2: TImage Left = 32 Top = 240 Width = 113 Height = 38 Picture.Data = {} Stretch = True Visible = False end object Image3: TImage Left = 160 Top = 240 Width = 113 Height = 38 Picture.Data = {} Stretch = True Visible = False end object Label1: TLabel Left = 40 Top = 248 Width = 97 Height = 25 Alignment = taCenter AutoSize = False Caption = 'Bul' Font.Charset = DEFAULT_CHARSET Font.Color = clLime Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True OnMouseDown = Label1MouseDown OnMouseUp = Label1MouseUp end object Label2: TLabel Left = 168 Top = 248 Width = 97 Height = 25 Alignment = taCenter AutoSize = False Caption = '��k��' Font.Charset = DEFAULT_CHARSET Font.Color = clLime Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True OnMouseDown = Label2MouseDown OnMouseUp = Label2MouseUp end object Label3: TLabel Left = 32 Top = 224 Width = 46 Height = 13 Caption = 'Ad Soyad' Transparent = True Visible = False end object SpeedButton1: TSpeedButton Left = 224 Top = 216 Width = 41 Height = 21 Caption = 'T�m�' OnClick = SpeedButton1Click end object DBGrid1: TDBGrid Left = 32 Top = 64 Width = 241 Height = 145 DataSource = Form6.DataSource1 FixedColor = 8750469 TabOrder = 0 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] OnDblClick = DBGrid1DblClick Columns = < item Expanded = False FieldName = 'Adsoyad' Visible = True end item Expanded = False FieldName = 'Semt' Visible = True end> end object Edit1: TEdit Left = 96 Top = 216 Width = 121 Height = 21 TabOrder = 1 OnChange = Edit1Change end object DataSource1: TDataSource DataSet = Query1 Left = 104 Top = 56 end object Query1: TQuery Active = True SQL.Strings = ( 'select * from kiralanandaireler') Left = 144 Top = 56 object Query1Adsoyad: TStringField FieldName = 'Adsoyad' end object Query1Kiralanandno: TIntegerField FieldName = 'Kiralanandno' end object Query1Semt: TStringField FieldName = 'Semt' Size = 15 end object Query1Fiyati: TCurrencyField FieldName = 'Fiyati' end object Query1Malsahibi: TStringField FieldName = 'Malsahibi' end object Query1Telefon: TStringField FieldName = 'Telefon' end object Query1Tarih: TStringField FieldName = 'Tarih' Size = 10 end object Query1Adres: TMemoField FieldName = 'Adres' BlobType = ftMemo Size = 100 end object Query1Telmalsahibi: TStringField FieldName = 'Telmalsahibi' end end end